package com.wj.idcenter.impl;

import com.wj.exception.IdCenterException;
import com.wj.idcenter.IdCenterGenerateTemplate;
import com.wj.zk.ZookeeperClient;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.core.env.Environment;
import org.springframework.stereotype.Component;

import javax.annotation.PostConstruct;

/**
 * @author
 * @since 1.8
 * @date 2018/3/12
 */

@Component("snowflakeIdTemplate")
public class SnowflakeIdGenerateService implements IdCenterGenerateTemplate {

    // ==============================Fields===========================================

    /** 机器id所占的位数 */
    private final long workerIdBits = 5L;

    /** 工作机器ID(0~31) */
    private long workerId;

    /** 数据中心ID(0~31) */
    private long dataCenterId;

    /** 毫秒内序列(0~4095) */
    private long sequence = 0L;

    /** 上次生成ID的时间截 */
    private long lastTimestamp = -1L;

    @Autowired
    private Environment env;

    private static final String HOST = "idCenter.zookeeper.host";

    //==============================Constructors=====================================
    /**
     * 构造函数
     */
    public SnowflakeIdGenerateService() {
    }

    @PostConstruct
    public void init() {
        parseConfig();
        /* 支持的最大机器id，结果是31 (这个移位算法可以很快的计算出几位二进制数所能表示的最大十进制数) */
        long maxWorkerId = ~(-1L << workerIdBits);
        if (workerId > maxWorkerId || workerId < 0) {
            throw new IllegalArgumentException(String.format("worker Id can't be greater than %d or less than 0", maxWorkerId));
        }
        /* 支持的最大数据标识id，结果是31 */
        /* 数据标识id所占的位数 */
        long dataCenterIdBits = 5L;
        long maxDataCenterId = ~(-1L << dataCenterIdBits);
        if (dataCenterId > maxDataCenterId || dataCenterId < 0) {
            throw new IllegalArgumentException(String.format("datacenter Id can't be greater than %d or less than 0", maxDataCenterId));
        }
    }

    private void parseConfig() {
        String host = env.getProperty(HOST);
        if (host != null&&host.length() != 0) {
            ZookeeperClient zookeeperClient = new ZookeeperClient(host);
            zookeeperClient.init();
            workerId = zookeeperClient.getWorkerId();
            //dataCenterId = zookeeperClient.getdataCenterId();
        }
        else {
            String sWorkerId = env.getProperty("idCenter.workerId");
            String sDataCenterId = env.getProperty("idCenter.DataCenterId");
            if (sWorkerId != null && sWorkerId.length() != 0) {
                workerId = Integer.valueOf(sWorkerId);
            }
            else {
                throw new IdCenterException("idCenter.workerId not config");
            }
            if (sDataCenterId != null && sDataCenterId.length() != 0) {
                dataCenterId = Integer.valueOf(sDataCenterId);
            }
            else {
                throw new IdCenterException("idCenter.dataCenterId not config");
            }
        }
    }

    // ==============================Methods==========================================
    /**
     * 获得下一个ID (该方法是线程安全的)
     * @return SnowflakeId
     */
    public long nextId() {
        synchronized(this) {
            long timestamp = timeGen();

            //如果当前时间小于上一次ID生成的时间戳，说明系统时钟回退过这个时候应当抛出异常
            if (timestamp < lastTimestamp) {
                throw new RuntimeException(
                        String.format("Clock moved backwards.  Refusing to generate id for %d milliseconds", lastTimestamp - timestamp));
            }

            //如果是同一时间生成的，则进行毫秒内序列
            /* 序列在id中占的位数 */
            long sequenceBits = 12L;
            if (lastTimestamp == timestamp) {
                /* 生成序列的掩码，这里为4095 (0b111111111111=0xfff=4095) */
                long sequenceMask = ~(-1L << sequenceBits);
                sequence = (sequence + 1) & sequenceMask;
                //毫秒内序列溢出
                if (sequence == 0) {
                    //阻塞到下一个毫秒,获得新的时间戳
                    timestamp = tilNextMillis(lastTimestamp);
                }
            }
            //时间戳改变，毫秒内序列重置
            else {
                sequence = 0L;
            }

            //上次生成ID的时间截
            lastTimestamp = timestamp;

            //移位并通过或运算拼到一起组成64位的ID
            /* 时间截向左移22位(5+5+12) */
            long timestampLeftShift = sequenceBits + workerIdBits + 5L;
            /* 机器ID向左移12位 */
            /* 开始时间截 (2015-01-01) */
            long twepoch = 1420041600000L;
            /* 数据标识id向左移17位(12+5) */
            long dataCenterIdShift = sequenceBits + workerIdBits;
            return ((timestamp - twepoch) << timestampLeftShift)
                    | (dataCenterId << dataCenterIdShift)
                    | (workerId << sequenceBits)
                    | sequence;
        }
    }

    /**
     * 阻塞到下一个毫秒，直到获得新的时间戳
     * @param lastTimestamp 上次生成ID的时间截
     * @return 当前时间戳
     */
    private long tilNextMillis(long lastTimestamp) {
        long timestamp = timeGen();
        while (timestamp <= lastTimestamp) {
            timestamp = timeGen();
        }
        return timestamp;
    }

    /**
     * 返回以毫秒为单位的当前时间
     * @return 当前时间(毫秒)
     */
    private long timeGen() {
        return System.currentTimeMillis();
    }

    public long getWorkerId() {
        return workerId;
    }

    public void setWorkerId(long workerId) {
        this.workerId = workerId;
    }

    public long getDataCenterId() {
        return dataCenterId;
    }

    public void setDataCenterId(long dataCenterId) {
        this.dataCenterId = dataCenterId;
    }
}
